#!/usr/bin/env tclsh

#检测文件 run.sh 文件是否存在
set fileName "run.sh"
if { [file exists $fileName] == 1 } {
    puts "$fileName文件存在"
} else {
    puts "$fileName文件不存在"
}

# 拷贝文件
set fileDst "test.txt"
if { [file exists $fileDst] == 1} { ;#文件存在则先删除该文件
    #删除文件 test.txt
    file delete $fileDst
} else {
    #拷贝文件 run.sh 到 text.txt
    file copy 
}




